home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / em7sui_1 / em7sui~1.exe / Intro.wr_ / Intro.wr
Text File  |  1998-11-09  |  6KB  |  317 lines
  1. #VRML V2.0 utf8
  2.  
  3. EXTERNPROTO GridGray [ exposedField SFFloat transparency ] "..\Appearances\MetalMaterials.wrl#color26"
  4.  
  5. EXTERNPROTO Red [ exposedField SFFloat transparency ] "..\Appearances\SummerMaterials.wrl#color2"
  6. EXTERNPROTO Blue [ exposedField SFFloat transparency ] "..\Appearances\SummerMaterials.wrl#color19"
  7.  
  8. EXTERNPROTO em7_ChartGrid [
  9.     exposedField SFNode appearance
  10.     exposedField SFColor lineColor
  11.     field SFInt32 xDimension
  12.     field SFFloat xSpacing
  13.     field SFInt32 yDimension
  14.     field SFFloat ySpacing
  15.     field SFInt32 zDimension
  16.     field SFFloat zSpacing
  17.     field SFFloat thickness
  18.     eventIn SFInt32 set_xDimension 
  19.     eventIn SFFloat set_xSpacing 
  20.     eventIn SFInt32 set_yDimension 
  21.     eventIn SFFloat set_ySpacing 
  22.     eventIn SFInt32 set_zDimension 
  23.     eventIn SFFloat set_zSpacing 
  24.     eventIn SFFloat set_thickness
  25. ] "..\VR_GRAPH.wrl#em7_ChartGrid"
  26.                 
  27. EXTERNPROTO em7_RoundedRibbonSeries [
  28.     exposedField SFNode appearance
  29.     field SFInt32 xDimension
  30.     field SFFloat xSpacing
  31.     field SFFloat thickness
  32.     field SFFloat depth
  33.     field MFFloat height
  34.     field SFFloat bevelRadius
  35.     field SFFloat creaseAngle
  36.     eventIn SFInt32 set_xDimension
  37.     eventIn SFFloat set_xSpacing
  38.     eventIn SFFloat set_thickness
  39.     eventIn SFFloat set_depth
  40.     eventIn MFFloat set_height
  41. ] "..\VR_GRAPH.wrl#em7_RoundedRibbonSeries"
  42.  
  43. EXTERNPROTO em7_Legend [
  44.     field MFNode appearances
  45.     field MFString descriptions
  46.     field SFString keyStyle 
  47.     field SFFloat textHeight
  48.     field SFFloat textGap
  49.     field SFColor textColor
  50.     eventIn MFNode set_appearances
  51.     eventIn MFString set_descriptions
  52. ] "..\VR_GRAPH.wrl#em7_Legend"
  53.  
  54. EXTERNPROTO em7_LookAt [
  55.     field SFVec3f viewerPos
  56.     field SFVec3f viewedPos
  57.     field SFBool enabled
  58.     eventIn SFVec3f set_viewerPos
  59.     eventIn SFVec3f set_viewedPos
  60.     eventIn SFBool set_enabled
  61.     eventOut SFRotation orientation_changed
  62. ] "..\VR_NAV.wrl#em7_LookAt"
  63.  
  64. EXTERNPROTO em7_TextList [
  65.     exposedField SFNode appearance
  66.     field MFString string
  67.     field SFFloat textHeight
  68.     field SFFloat textGap
  69.     field SFInt32 visibleCount
  70.     field SFInt32 topIndex
  71.     exposedField MFFloat length
  72.     exposedField SFFloat maxExtent
  73.     field SFString family
  74.     field SFString style
  75.     field MFString justify
  76.     field SFBool horizontal
  77.     field SFBool leftToRight
  78.     field SFBool topToBottom
  79.     field SFString language
  80.     eventIn MFString set_string
  81.     eventIn MFString addStrings
  82.     eventIn SFInt32 set_visibleCount
  83.     eventIn SFInt32 set_topIndex
  84.     eventOut MFString visibleText_changed
  85.     eventOut SFInt32 topIndex_changed
  86.     eventOut SFInt32 listRange_changed
  87. ] "..\VR_UI.wrl#em7_TextList"
  88.  
  89. EXTERNPROTO em7_PopupStrip [
  90.     field SFInt32 xDimension
  91.     field SFFloat xSpacing
  92.     field SFFloat radius
  93.     field SFFloat depth
  94.     field MFFloat height
  95.     field SFColor color
  96.     field SFFloat transparency
  97.     field SFString defaultPopupText
  98.     field SFFloat popupHeight
  99.     field SFString allignment
  100.     field MFString popupText
  101.     exposedField SFColor textColor
  102.     exposedField SFColor backgroundColor
  103.     exposedField SFColor borderColor
  104.     exposedField SFBool touchEnabled
  105.     eventIn MFString set_popupText
  106.     eventIn MFFloat set_height
  107.     eventOut SFInt32 mouseOverIndex
  108.     eventOut SFInt32 mouseClickedIndex
  109. ] "..\VR_GRAPH.wrl#em7_PopupStrip"
  110.  
  111.  
  112. NavigationInfo {
  113.     headlight FALSE
  114. }
  115.  
  116. Background {
  117.     skyColor [
  118.         0 0 0
  119.         0.4 0.4 0.6
  120.         1 1 1
  121.     ]
  122.     skyAngle [2, 3]
  123. }
  124.  
  125. # the viewpoint and the look at functionality
  126.  
  127. DEF VIEW Viewpoint {
  128.     position 7 6 21
  129. }
  130.  
  131. DEF LOOKAT em7_LookAt {
  132.     viewerPos 7 6 21
  133.     viewedPos 6 0 0
  134. }
  135.  
  136. # the chart casing
  137.  
  138. em7_ChartGrid {
  139.     appearance GridGray { }
  140.         lineColor 0.3 0.3 0.3
  141.     xDimension 5
  142.     xSpacing 3
  143.     yDimension 7
  144.     ySpacing 1
  145.     zDimension 3
  146.     zSpacing 4
  147.     thickness 0.15
  148. }
  149.  
  150. # the columns
  151.  
  152. Transform {
  153.     translation 1.8 0 1.8
  154.     children [
  155.         Anchor {
  156.             url "ProdAOverview.wrl"    
  157.             children [
  158.                 em7_RoundedRibbonSeries {
  159.                     appearance Red { }
  160.                     xDimension 4
  161.                     xSpacing 3
  162.                     thickness 0.2
  163.                     depth 0.4
  164.                     height [ 3, 3.1, 2.7, 4.1 ]
  165.                 }
  166.             ]
  167.         },
  168.         em7_PopupStrip {
  169.             xDimension 4
  170.             xSpacing 3
  171.             depth 0.9
  172.             transparency 1
  173.             popupHeight 0.65
  174.             height [ 3, 3.1, 2.7, 4.1 ]
  175.             popupText ["957,794", "1,014,012", "922,693", "740,818"]
  176.         }
  177.     ]
  178. }
  179.  
  180.  
  181. Transform {
  182.     translation 1.8 0 5.8
  183.     children [
  184.         Anchor {
  185.             url "ProdBOverview.wrl"    
  186.             children [
  187.                 em7_RoundedRibbonSeries {
  188.                     appearance Blue { }
  189.                     xDimension 4
  190.                     xSpacing 3
  191.                     thickness 0.2
  192.                     depth 0.4
  193.                     height [5.5, 5.2, 4.7, 3.8 ]
  194.                 }
  195.             ]
  196.         },
  197.         em7_PopupStrip {
  198.             xDimension 4
  199.             xSpacing 3
  200.             radius 0.4
  201.             depth 0.9
  202.             transparency 1
  203.             popupHeight 0.65
  204.             height [5.5, 5.2, 4.7, 3.8 ]
  205.             popupText ["812,869", "752,826", "862,888", "812,357"]
  206.         }
  207.     ]
  208. }
  209.  
  210. # custom lighting
  211.  
  212. DEF LIGHT1 PointLight {
  213.     location 55 30 13
  214.     intensity 0.6
  215.     ambientIntensity 0.5
  216. }
  217.  
  218. DEF LIGHT2 PointLight {
  219.     location 13 20 55
  220.     intensity 0.5
  221.     ambientIntensity 0.5
  222. }
  223.  
  224. DEF LIGHT3 PointLight {
  225.     location 0 0 60
  226.     intensity 0.4
  227.     ambientIntensity 0.5
  228. }
  229.  
  230.  
  231. Transform {
  232.     translation 10.9 0 8.25
  233.     rotation -2.02099 2.02099 2.021 2.094399
  234.     children [
  235.         em7_TextList {
  236.             string ["Feb 96 - Jul 96",
  237.                 "Aug 96 - Jan 97",
  238.                 "Feb 97 - Jul 97",
  239.                 "Aug 97 - Jan 98"
  240.             ]
  241.             visibleCount 4
  242.             textHeight 0.8
  243.             textGap 2.2
  244.             family "SANS"
  245.             justify ["END", "END"]
  246.         }
  247.     ]
  248. }
  249.     
  250. Transform {
  251.     translation 12.2 0 6.5
  252.     rotation 1 0 0 -1.5708
  253.     children [
  254.         em7_TextList {
  255.             string ["Product A", "Product B"]
  256.             visibleCount 2
  257.             textHeight 1
  258.             textGap 3
  259.             family "SANS"
  260.             justify ["BEGIN", "END"]
  261.         }
  262.     ]
  263. }
  264.  
  265. Transform {
  266.     translation 6 7 0
  267.     children [
  268.         Shape {
  269.             geometry Text {
  270.                 string "Products A vs. B"
  271.                 fontStyle FontStyle {
  272.                     justify "MIDDLE"
  273.                     family "SANS"
  274.                     size 0.9
  275.                 }
  276.             }
  277.         }
  278.     ]
  279. }
  280.  
  281. Transform {
  282.     translation 6 6.25 0
  283.     children [
  284.         Shape {
  285.             geometry Text {
  286.                 string "(Expected Performance)"
  287.                 fontStyle FontStyle {
  288.                     justify "MIDDLE"
  289.                     family "SANS"
  290.                     size 0.6
  291.                 }
  292.             }
  293.         }
  294.     ]
  295. }
  296.  
  297. # the legend
  298.  
  299. Transform {
  300.     translation 15 1 0
  301.     children [
  302.         em7_Legend {
  303.             appearances [
  304.                 Red {}
  305.                 Blue {}
  306.             ]
  307.             textHeight 1
  308.             textGap 0.75
  309.             descriptions ["Product A", "Product B"]
  310.         }
  311.     ]
  312. }
  313.  
  314.  
  315.  
  316. ROUTE LOOKAT.orientation_changed TO VIEW.set_orientation
  317.